program TopClientShell;

uses
  SysUtils,
  Forms,
  uMain in 'uMain.pas' {frmMain},
  uLogin in 'common\uLogin.pas' {frmLogin},
  uSplash in 'common\uSplash.pas' {frmSplash},
  ClientInit in 'common\ClientInit.pas',
  uDataModule in 'common\uDataModule.pas' {dm: TDataModule},
  uMainVar in 'common\uMainVar.pas',
  uMainClass in 'common\uMainClass.pas',
  uMainConst in 'common\uMainConst.pas',
  FLockScreen in 'common\FLockScreen.pas' {F_LockScreen},
  FWaitForData in 'common\FWaitForData.pas' {F_WaitForData},
  uChangePwd in 'common\uChangePwd.pas' {frmChangePwd},
  uConfig in 'common\uConfig.pas' {frmConfig},
  uQueryLogin in 'common\uQueryLogin.pas' {frmQueryLogin},
  uAbout in 'common\uAbout.pas' {frmAbout};

{$R *.res}

begin
  DateSeparator := '-';
  ShortDateFormat := 'yyyy-MM-dd';

  Application.Initialize;
  doLoadUIconfig;
  frmSplash := TfrmSplash.Create(Application);
  frmSplash.Show;
  if uLogin.doLogin then
  begin
    Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
  end;
end.

